Data Base of the Video Yearbook 1995/Data Base of the Video Yearbook 1995 - Disc 1.iso/cosmos/pack2.dir/00023.ls

Text File | 1995-12-30 | 582 b | 24 lines

on mouseDown
  global numb, mydatebase, h, v
  puppetSound("kan")
  repeat while stillDown()
    if rollOver(clickOn()) then
      set the castNum of sprite clickOn() to 44
      next repeat
    end if
    set the castNum of sprite clickOn() to 43
  end repeat
  set the castNum of sprite clickOn() to 43
  set h to the locH of sprite 15
  set v to the locV of sprite 15
  if item 11 of line numb of mydatebase <> 0 then
  else
    puppetSprite(15, 1)
    set the locH of sprite 15 to h
    set the locV of sprite 15 to v + 220
  end if
  updateStage()
  unLoad()
  go("movie")
end